home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
CD ROM Paradise Collection 4
/
CD ROM Paradise Collection 4 1995 Nov.iso
/
filutil
/
vndutl13.zip
/
RGY_ATO.BAT
< prev
next >
Wrap
DOS Batch File
|
1994-07-27
|
2KB
|
60 lines
goto start
:usage
@echo off
echo ┌───────────────────────────────────────────────────────┐
echo │ rgy_ato.bat -- Builds AUTOSIG e-mail script to submit │
echo │ VENDINFO.DIZ file to Product Registry │
echo │ │
echo │ usage: │
echo │ upl_ato vendinfo_file │
echo │ where: │
echo │ vendinfo_file = pathname of VENDINFO.DIZ file │
echo │ │
echo │ example: │
echo │ rgy_ato C:\VENDINFO.DIZ │
echo │ │
echo │ NOTE: Invoke in ATO directory. │
echo │ VENDPRCS.EXE must be on your DOS path. │
echo │ NOTE: For multi-package products (more than one ZIP), │
echo │ submit only the main VENDINFO file (from first │
echo │ package) │
echo │ │
echo │ From the VNDUTL VENDINFO Utilities, v1.02 (7/26/94) │
echo │ Copyright 1994 Rams' Island Software, Parker, CO USA │
echo └───────────────────────────────────────────────────────┘
goto done
::----- check arguments -------------------------------------------
::----- first argument must VENDINFO file pathname -------------
:start
if %1. == . goto usage
if not exist %1 goto problem
goto argsOK
:argsOK
::----- test VENDINFO file ----------------------------------------
vendprcs %1 -xppt
if errorlevel 52 goto viFileOK
goto problem
:viFileOK
::----- build upload script ---------------------------------------
echo logon mail >> upvndrgy.scr
echo upl %1 >> upvndrgy.scr
echo match 'ID):' >> upvndrgy.scr
echo sendline 76244,324 >> upvndrgy.scr
echo match 'Subject:' >> upvndrgy.scr
vendprcs %1 -xppt -y "sendline Upload: @.DIZ" >> upvndrgy.scr
echo match '(Y or N)!' >> upvndrgy.scr
echo sendline Y >> upvndrgy.scr
echo match 'Mail!' >> upvndrgy.scr
echo logoff >> upvndrgy.scr
goto done
:problem
@echo off
echo Specified VENDINFO file does not exist, or is corrupted, unregistered,
echo or has some other difficulty.
:done